package jus.aoo.lisp;

public class Car extends Subr {
	public static Car CAR = new Car();

	
	public Sexpr apply(Scons e) throws LispException{
		Sexpr a = e.car();
		Sexpr b = e.cdr();
		if (b instanceof Nil && a instanceof Sexpr) {
			return a.car();
		}
		
		throw new LispException("Erreur Car");
	}
	
	public String toString(){
		return "car";
	}
}
